#get samples
my_file="/Volumes/Data/switch_project/exp16/1000M/900M/1/1_flow_loss_episode.txt";
X=scan(file=my_file);
lagMax=100;

#plot seq
quartz();
plot(X);

#plot cdf
quartz();
plot(ecdf(X), col="red");

#calculate autocor
#quartz();
#X_acf=acf(X, lag.max=lagMax, type="correlation", plot=TRUE);
#print(X_acf);

